home *** CD-ROM | disk | FTP | other *** search
/ PC World 2007 December / PCWorld_2007-12_cd.bin / domacnost a kancelar / autoit / autoit-v3-setup.exe / Examples / Helpfile / _SQLite_SetTimeout.au3 < prev    next >
Text File  |  2007-09-08  |  1KB  |  31 lines
  1. #include <SQLite.au3>
  2. #include <SQLite.dll.au3>
  3. #include <File.au3>
  4.  
  5. _SQLite_Startup()
  6.  
  7. Local $sDatabase, $hDB_a, $hDB_b, $iTimer, $iRval
  8. $sDatabase = _TempFile()
  9. $hDB_a = _SQLite_Open($sDatabase)
  10. $hDB_b = _SQLite_Open($sDatabase)
  11.  
  12. _SQLite_Exec($hDB_a,"BEGIN EXCLUSIVE;")
  13. _SQLite_Exec($hDB_a,"CREATE TABLE test (a,b,c);")
  14. _SQLite_Exec($hDB_a,"INSERT INTO test VALUES (1,2,3);")
  15. ; Table 'test' is Busy now...
  16.  
  17. _SQLite_SetTimeout($hDB_b,0)
  18. $iTimer = TimerInit()
  19. $iRval = _SQLite_Exec($hDB_b,"SELECT * FROM test") ; This will fail
  20. MsgBox(0,"_SQLite_SetTimeout Example No Timeout", "Time: " & TimerDiff($iTimer) & @LF _
  21.                                                 & "Error: " & _SQLite_ErrMsg($hDB_b) & @LF)
  22. _SQLite_SetTimeout($hDB_b,5000)
  23. $iTimer = TimerInit()
  24. $iRval = _SQLite_Exec($hDB_b,"SELECT * FROM test") ; This will fail
  25. MsgBox(0,"_SQLite_SetTimeout Example 5 Sec Timeout", "Time: " & TimerDiff($iTimer) & @LF _
  26.                                                    & "Error: " & _SQLite_ErrMsg($hDB_b) & @LF)
  27. _SQLite_Exec($hDB_a,"END;")
  28. _SQLite_Close($hDB_a)
  29. _SQLite_Close($hDB_b)
  30. _SQLite_Shutdown()
  31. FileDelete($sDatabase)